<%@codepage=65001%>
<!--#include file="classData.asp"-->
<%
Response.Buffer = True 
Response.ExpiresAbsolute = Now() - 1 
Response.Expires = 0 
Response.CacheControl = "no-cache" 
Response.AddHeader "Pragma", "No-Cache"

	SectionNum = Request.QueryString("jieduanid")
	Area = Request.QueryString("Area")

	set HuaObj = new sysData
	HuaObj.sqlConnOpen()
	
	set HuaRds=server.CreateObject("ADODB.recordset")
	HuaObj.DbQuery HuaRds,"LeagueName",QueryStr,0," LNId > 0 ORDER BY OrderNum"

	response.ContentType="text/xml"	
	Response.Write("<?xml version=""1.0"" encoding=""utf-8""?>"&vbcrlf)
	Response.Write("<xml>"&vbcrlf)
	
	while not(HuaRds.eof)
	
		Response.Write("<Shi ShiId = """&HuaRds("LNId")&""">"&vbcrlf)
		Response.Write("<name>"&HuaRds("LName")&"</name>"&vbcrlf)
		Response.Write("</Shi>"&vbcrlf)
		HuaRds.MoveNext
	
	wend
	
	Response.Write("</xml>"&vbcrlf)
	
	HuaRds.Close
	HuaObj.sqlConnClose()


%>
